unit INI_CCOCashDrawer;

interface
uses
  SysUtils, INI_NamedDevice;

const
  SectionCCOCashDrawer          = 'CCOCashDrawer';

type
  EOIniCCOCashDrawer = class(EOIniNamedDevice)
  private

  protected
    function GetDeviceName: String; override;

  public
    constructor Create(ID: String); override;

  end;

  function getInstance: EOIniCCOCashDrawer;

implementation

function EOIniCCOCashDrawer.GetDeviceName: String;
begin
  Result := ReadString(KeyDeviceName, IntToStr(Integer(INI_NamedDevice.sdnXCA)));
end;

constructor EOIniCCOCashDrawer.Create(ID: String);
begin
  Inherited Create(SectionCCOCashDrawer + ID);

end;

var
  IniNamedDeviceCD: EOIniCCOCashDrawer = Nil;

function getInstance: EOIniCCOCashDrawer;
begin
  if IniNamedDeviceCD = Nil then
    IniNamedDeviceCD := EOIniCCOCashDrawer.Create('');
  Result := IniNamedDeviceCD;
end;

end.
